home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-20 / rs0422.zip / CONFIGUR / ZAPIT.LST < prev    next >
File List  |  1990-01-14  |  3KB  |  62 lines
  1.  
  2.  
  3. HI-TECH SOFTWARE Z80 Macro Assembler: zapit.as
  4.                                                                                                                           Page   1
  5.  
  6.  
  7.    1                                global    _config        ; This is a modified version of Booter.C
  8.    2    0000'                       psect    data
  9.    3    0000'                   _config:
  10.    4    0000' 84                    defb    -124
  11.    5    0001' 9E                    defb    -98
  12.    6    0002' 9E                    defb    -98
  13.    7    0003' A8                    defb    -88
  14.    8    0004' 40                    defb    64
  15.    9    0005' 40                    defb    64
  16.   10    0006' 00                    defb    0
  17.   11                                global    _die
  18.   12    0007' 0000'                 defw    _die
  19.   13    0009' 0000'                 defw    _die
  20.   14    000B' 0000'                 defw    _die
  21.   15    000D' 0000'                 defw    _die
  22.   16    000F' 0000'                 defw    _die
  23.   17    0011' 0000'                 defw    _die
  24.   18    0013' 0000'                 defw    _die
  25.   19    0015' 0017'                 defw    19f
  26.   20    0000'                       psect    text
  27.   21    0000'                   _die:
  28.   22    0000' F3                    DI            ; NO INTS!!!
  29.   23    0001' 2A 0015'              LD    HL,(VY)        ; Get a LDIR Instruction
  30.   24    0004' 22 FFFE               LD    (0FFFEh),HL    ; Put it at the location just before 0000
  31.   25    0007' 21 8000               LD    HL,8000h    ; Source
  32.   26    000A' 11 8001               LD    DE,8001h    ; Destination
  33.   27    000D' 01 7FFC               LD    BC,7FFCh    ; Length
  34.   28    0010' 36 00                 LD    (HL),0        ; Value to Fill with
  35.   29    0012' C3 FFFE               JP    0FFFEh        ; Die you bastard!!!
  36.   30    0015' ED B0             VY:    LDIR            ; This must be at the LAST location we clear
  37.   31    0017'                       psect    data
  38.   32    0017'                   19:
  39.   33    0017' 42 4F 4F 54           defb    66,79,79,84,32,45,32,82,79,83,69,32,66,79,79,84
  40.         001B' 20 2D 20 52       
  41.         001F' 4F 53 45 20       
  42.         0023' 42 4F 4F 54       
  43.   34    0027' 20 50 72 6F           defb    32,80,114,111,103,114,97,109,32,45,32,75,101,101,112,32
  44.         002B' 67 72 61 6D       
  45.         002F' 20 2D 20 4B       
  46.         0033' 65 65 70 20       
  47.   35    0037' 4F 75 74 0D           defb    79,117,116,13,0
  48.         003B' 00                
  49.   36    0017'                       psect    text
  50.  
  51.  
  52. HI-TECH SOFTWARE Z80 Macro Assembler: 
  53.                                                                                                                           Page   2
  54.  
  55.  
  56.  
  57.                                                 ---------- Symbol Table ----------
  58.  
  59.   (ABS) 0000#       VY 0015'  _config 0000'     _die 0000'     data 003C#     text 0017#  
  60.  
  61. 0 jump optimizations
  62.